home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / MASKSUNA.DSK / ROOM 13.0.txt < prev    next >
Text File  |  2014-09-09  |  812b  |  70 lines
  1. .S F=N
  2. .S N=13
  3. .!LOOK
  4. .!HERE
  5. !LOOK
  6. .!CLRT
  7. .P "You are at a branch in the tunnel.
  8. .I GE(6):2
  9. .T P "Passages go to the left, right,
  10. .I GE(6):7
  11. .T P "Passages go forward, to the right,
  12. .I GE(6):6
  13. .T P "Passages go forward, to the left,
  14. .P "and back behind you.
  15. %L...
  16. .!CLRT
  17. .I F#16
  18. .T J +3
  19. .!INVD
  20. !!!!!
  21. .P "You turn down the left passage.
  22. .I F:14
  23. .T !GT15
  24. .E !GT16
  25. .!TUNL
  26. %R...
  27. .!CLRT
  28. .I F#14
  29. .T J +3
  30. .!INVD
  31. !!!!!
  32. .P "You turn down the right passage.
  33. .I F:15
  34. .T !GT14
  35. .E !GT15
  36. .!TUNL
  37. %FW..
  38. .!CLRT
  39. .I F#15
  40. .T J +3
  41. .!INVD
  42. !!!!!
  43. .P "You continue forward.
  44. .I F:14
  45. .T !GT16
  46. .E !GT14
  47. .!TUNL
  48. %BK..
  49. .!CLRT
  50. .P "You turn around and trudge back down
  51. .P "the passage.
  52. .I F:14
  53. .T !GT14
  54. .I F:15
  55. .T !GT15
  56. .I F:16
  57. .T !GT16
  58. .!TUNL
  59. !GT14
  60. .3 ROOM 14.0 
  61. .S GE(6)=0
  62. !GT15
  63. .3 ROOM 15.0 
  64. .S GE(6)=0
  65. !GT16
  66. .3 ROOM 16.0 
  67. .S GE(6)=20
  68. @@@@@
  69.  
  70.